/*
 * Copyright (c) 2018-2023 北京华恒盛世科技有限公司
 * QUICKPOOL is licensed under Mulan PSL v2.
 * You can use this software according to the terms and conditions of the Mulan PSL v2.
 * You may obtain a copy of Mulan PSL v2 at:
 *     http://license.coscl.org.cn/MulanPSL2
 * THIS SOFTWARE IS PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OF ANY KIND,
 * EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO NON-INFRINGEMENT,
 * MERCHANTABILITY OR FIT FOR A PARTICULAR PURPOSE.
 * See the Mulan PSL v2 for more details.
*/

#include "xdrbase.h"
#include "channel.h"
#include "api.h"

/**
 * @brief       API: get queue list information from the cluster.
 *
 * @param[in]   queuereq     #1: query queue list request key values
 * @param[in]   master       #2: master(port and name) to be called
 *
 * @retval      not NULL     #1: succeed
 * @retval      NULL         #2: failed
 *
 * @note        When succeed, QuickPoolQueueReply should be freed by the caller.
 *              When failed, error message is set to reply in this API.
 */
struct QuickPoolQueueReply *
client_get_queueinfo(struct request *queuereq, struct poolMaster *master)
{
    if (NULL == queuereq || 0 == queuereq->number) {
        log_message(ERR, NOCLASS, "%s: Must specify query queue request.", __func__);
	return NULL;
    }

    // check the first key to avoid unknown request from client.
    if (REQUEST_KEY_OPTIONS != queuereq->keyvalues[0].key) {
        log_message(ERR, NOCLASS, "%s: First key must be option for query queue request.",
                    __func__);
	return NULL;
    }

    struct auth auth;
    gf_set_auth(&auth, commandParams[AUTH_KIND].string_value);

    unsigned int size; // for calculating the size of the request.
    size = gf_xdrsize_request(queuereq);
    size += gf_xdrsize_auth(&auth);
    size += HEADER_LEN;

    char *request;
    request = (char *)calloc(size, sizeof(char));
    if (NULL == request) {

        log_message(ERR, NOCLASS, STR_FUNC_D_FAIL_M, __func__, "calloc", size);
        gf_xdr_free(gf_xdr_auth, (void *)&auth);
        quickpool_errno = ERROR_MEMORY;
	return NULL;
    }

    XDR xdrs;
    xdrmem_create(&xdrs, request, size, XDR_ENCODE);

    struct header tohdr, outhdr;
    gf_init_header(&tohdr);
    tohdr.reqcode = BATCH_QUE_INFO;

    if (!gf_xdr_message(&xdrs, queuereq, &tohdr, &auth, gf_xdr_request, NULL)) {

        // fail to encode request.
        log_message(ERR, NOCLASS, STR_FUNC_FAIL, __func__, "gf_xdr_message");
        xdr_destroy(&xdrs);
        FREEUP(request);
        gf_xdr_free(gf_xdr_auth, (void *)&auth);
        quickpool_errno = ERROR_XDR;

        return NULL;
    }

    char *masterList;
    unsigned int port;
    unsigned int connTimeout;
    unsigned int recvTimeout;
    if (NULL != master) { // client set master, let's call it directly.
        masterList = master->master;
        port = master->port;
        connTimeout = master->conntimeout;
        recvTimeout = master->recvtimeout;
    } else {
        masterList = qp_getmastername(); // call JM to get the maste name.
        if (NULL == masterList) {
            // JM do not know who is master, let's try g_masterlist.
            masterList = g_masterlist;
        }

        port = g_js_port;
        connTimeout = g_conntimeout;
        recvTimeout = g_recvtimeout;
    }

    char *reply;
    int cc, fd;
    cc = gf_callmaster(masterList, port, connTimeout, recvTimeout, g_connretries,
                       XDR_GETPOS(&xdrs), request, &outhdr, &reply, &fd);

    if (0 < fd) {
        gf_chan_close(fd);
    }
    FREEUP(request);
    xdr_destroy(&xdrs);
    gf_xdr_free(gf_xdr_auth, (void *)&auth);

    if (0 > cc) { // communication in trouble.

        FREEUP(reply);
        log_message(ERR, NOCLASS, STR_FUNC_S_FAIL, __func__, "gf_callmaster", masterList);
        return NULL;
    }

    struct QuickPoolQueueReply *queueReply;
    queueReply = (struct QuickPoolQueueReply *)calloc(1, sizeof(struct QuickPoolQueueReply));
    if (NULL == queueReply) {

        log_message(ERR, NOCLASS, STR_FUNC_D_FAIL_M, __func__, "calloc",
                    sizeof(struct QuickPoolQueueReply));
        FREEUP(reply);
        quickpool_errno = ERROR_MEMORY;
	return NULL;
    }

    quickpool_errno = outhdr.reqcode;
    if (quickpool_errno == 0) {

        // Got queue list reply from JS.
        xdrmem_create(&xdrs, reply, outhdr.length, XDR_DECODE);

        unsigned int num = 0;
        if (!libxdr_queue_reply(&xdrs, queueReply, &outhdr, &num)) {

            log_message(ERR, NOCLASS, STR_FUNC_FAIL, __func__, "libxdr_queue_reply");
            xdr_destroy(&xdrs);
            FREEUP(queueReply);
            FREEUP(reply);

            return NULL;
        }
    } else {

        // JS replied error message, decode it.
        xdrmem_create(&xdrs, reply, outhdr.length, XDR_DECODE);

        char *sp = queueReply->error_message;        
        if (!gf_xdr_string(&xdrs, &sp, &outhdr, NULL)) {

            log_message(ERR, NOCLASS, STR_FUNC_FAIL, __func__, "gf_xdr_string");
            xdr_destroy(&xdrs);
            FREEUP(queueReply);
            FREEUP(reply);

            return NULL;
        }
    }

    xdr_destroy(&xdrs);
    FREEUP(reply);

    return queueReply;
} // end function client_get_queueinfo
